HPAVC/HPAVC CD-ROM.iso/pc/ABUSESRC.ZIP/AbuseSrc/macabuse/src/language.c

C/C++ Source or Header | 1997-05-20 | 221 b | 10 lines

#include "lisp.hpp"

char *lang_string(char *symbol)
{
  void *v=find_symbol(symbol);
  if (!v || !DEFINEDP(symbol_value(v))) return "Language symbol missing!";
  else return lstring_value(symbol_value(v));
}